-- card: 5184 from stack: in.0 -- bmap block id: 5818 -- flags: 0000 -- background id: 10646 -- name: go to main menu ----- HyperTalk script ----- -- Navigation from the Main Menu -- -- When the icon or text of a section is click -- the icon stays on the screen and the other icons an the text dissolve -- the top banner splits in the middle -- the selected icon flashes and zooms into a header -- the menu options for that section appear. -- -- Globals -- DisSpeed: the speed for the visual dissolve -- StdDelay: a standard delay for hilites and travel transitions -- Locals -- DestName: is "Section X:" where X should be 1, 2 or 3 -- this name is shared by the btn of the section -- the btns in the interm cds -- the fld that indicates if the section has been seen -- the name of the first cd of this section -- on mouseUp global DisSpeed, StdDelay -- is this a valid mouseUp? if "button" is in the name of the target then put the short name of the target into destName -- is this the first time we are going to that section? if cd fld destName is "first time" then -- flag that we've seen this animation put "It has been seen" into cd fld destName -- go to the intermediate cd set the style of btn destName of cd "animTitle2" to "transparent" visual DisSpeed go to cd "animTitle2" -- split the title graphic choose select tool drag from 144,1 to 315,62 set the dragSpeed to 1000 drag from 144,1 to 1,1 choose browse tool -- blink the big icon and hide it repeat 2 set the hilite of btn destName to not the hilite of btn destName wait StdDelay end repeat set the style of btn destName to "opaque" -- zoom from the BigIcon to the top middle title ZoomRect the rect of btn destName, the rect of cd fld destName show cd fld destName wait StdDelay -- zoom the main menu title to mainMenuIcon repeat 2 set the hilite of btn "menuTitle" to not the hilite of btn "menuTitle" wait StdDelay end repeat hide cd fld "menuTitle" zoomRect the rect of btn "menuTitle", the rect of btn "mainMenuIcon" lock screen -- hide btn "grey1" -- hide btn "grey2" unlock screen -- reset the intermediate card lock screen hide cd fld destName -- show btn "grey1" -- show btn "grey2" show cd fld "menuTitle" choose select tool doMenu "revert" choose browse tool -- go to the real cd go cd destName unlock screen with DisSpeed else visual DisSpeed go cd destName end if end if end mouseUp -- part 1 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=140 top=97 right=330 bottom=465 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 174 -- text size: 14 -- style flags: 0 -- line height: 14 -- part name: ----- HyperTalk script ----- -- One field sending mouseUp to three different btns -- we get the line and calculate what btn it corresponds to -- NOTE: the lines must end in a return -- the number of lines per section should be equal -- in this case there are 4 lines per section. -- ************************************************************ on mouseUp put 2 into XtraTopLns -- compute line number clicked get item 2 of the clickLoc - top of me put 1 + it div the textHeight of me into lineNum -- get rid off the top lines subtract XtraTopLns from lineNum if lineNum > 0 then -- get the top line of a set of 4 put lineNum - ( (lineNum-1) mod 5) into lineNum add XtraTopLns to lineNum -- send it to the corresponding line put word 1 of line lineNum of me && word 2 of line lineNum of me into btnName send mouseUp to btn btnName end if end mouseUp -- part 2 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=79 top=124 right=177 bottom=132 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: section 1: -- part 3 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=79 top=194 right=247 bottom=132 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: section 2: -- part 4 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=79 top=264 right=317 bottom=132 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: section 3: -- part 5 (field) -- low flags: 81 -- high flags: 0000 -- rect: left=10 top=317 right=333 bottom=61 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: section 3: -- part 6 (field) -- low flags: 81 -- high flags: 0000 -- rect: left=10 top=300 right=316 bottom=61 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: section 2: -- part 7 (field) -- low flags: 81 -- high flags: 0000 -- rect: left=10 top=282 right=298 bottom=61 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: section 1: -- part contents for background part 8 ----- text ----- M A I N M E N U -- part contents for card part 1 ----- text ----- Click on the drawings to go to a section. SECTION 1: HYPERCARD BASICS In this section are descriptions of what HyperCard is and how to use it, with definitions and a short history of hypertext and hypermedia. SECTION 2: THE NUTS & BOLTS OF HYPERCARD Here are introductions to HyperCard’s components, as well as more technical descriptions of the features added with HyperCard 2.0. SECTION 3: SUPPORTING HYPERCARD USERS This section includes common user questions, a practice scenario, and descriptions of how different audiences can use HyperCard. -- part contents for card part 5 ----- text ----- first time -- part contents for card part 6 ----- text ----- first time -- part contents for card part 7 ----- text ----- first time